Returns the gradient style for the specified fill. Read-only MsoGradientStyle.
MsoGradientStyle can be one of these MsoGradientStyle constants. |
msoGradientDiagonalDown |
msoGradientDiagonalUp |
msoGradientFromCenter |
msoGradientFromCorner |
msoGradientFromTitle |
msoGradientHorizontal |
msoGradientMixed |
msoGradientVertical |
expression.GradientStyle
expression Required. An expression that returns one of the objects in the Applies To list.
Set c1f = Charts(1).ChartArea.Fill
If c1f.Type = msoFillGradient And _
c1f.GradientColorType = msoGradientOneColor Then
With Charts(2).ChartArea.Fill
.Visible = True
.OneColorGradient c1f.GradientStyle, _
c1f.GradientVariant, c1f.GradientDegree
End With
End If